ر 


chiaditahamohamedtgmailk com 
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بسم الله الرحمن الرحيم والصلاة والسلام على الرسول الكريم محمد وصحبه 
أجمعين أما بعد : 

الكل يرى التطور السريع الحاصل في عالم البرمجيات وكل منا يريد الحصول 
توفرها أو قد تكون متوفرة ولكن ينقصها بعض الخصائص أو الميزات التي قد تكون مهمة 
لبعض منا , 

حسنا قد يقول البعض إن إنشاء البرامج الكبيرة أو الضخمة صعب أو مستحيل 
وخاصة لمبتدئ مثلي أقول له قد تكون مخطئا نوعا ما لأن هذه البرامج لم تصنع في يوم أو 
يومين إنما هي تمرة جهد جهيد بذله أناس عبر مر السنوات › فكل ما يتطلبه تعلم البرمجة 
بعض الوقت وبعض التركيز لذا سنقوم في هذا الكتيب إن شاء الله بالسير خطوة بخطوة نحو 
تعلم أساسيات البرمجة بالدالفي. 
أولا وقبل كل شىء درس فى الفلسفة: 
الكل لديه دافعه»ء إن لم يكن لديك دافع لفعل شيء ما خاصة إن كان يتطلب وقتا وصبرا قد 
i‏ عنه في ا »* . إن لم يكن قبل ذلك. 
أخلص نيتك لله عز وجل وتوكل عليه. 
خصص وقتا للتعلم تكون فيه مرتاح الذهن حتى يسهل عليك التركيز. 


ثانيا درس فى التاريخ: 


نبذة عن الدا لف 

الدالفي هي بيئة تطویر من نوع (Rapid Application Development ) RAD‏ من شركة تور لانك 
مبنية على لغة باسكال» وهي تسمح بتحقيق التطوير السهل والبسيط لبرامج لويندوز . 
وتعبير الدالفي لغة مرئية وهي من اللغات العالية الإنتاجيةء وتعتبر في مصاف اللغات 
القوية والسهلة معاء ويقال أنها تجمع بين سهولة لغة الفيجوال بيسك وقوة لغة سي ++ تم 
إنشائها في سنة 1995 وقد قيل بأنها سميت بالدالفي رجوعا إلى كلمة إغريقية قديمة تعني 
العرافة . 

هناك نسختان من هذه اللغةء النسخة الأولى خاصة بنظام التشغيل لويندوز وهي دلفي 
والثانية خاصة بنظام التشغيل لينكس وتحمل اسم كايل يكس. 


ملآحظة. 


- الكتاب مقسم إلى أجزاء سنتطرق في هذا الجزء لمدخل إلى عالم الدالفي. 


- اولا لابد من تنصيب الدالفى على الجهازر 


- ثانيا تشغيل برنامج الدالفى : 


إذهب إلى قائمة ابدأ أو 91۸1 أو 2۲١١١‏ 6ل حسب لغة نظام التشغيل الموجود عندك 
ڌم ”ى ALL PROGRAMS‏ ãîۃم‏ إلى 7 Delphi7 مû Borland Delphi‏ كما في 


الصورة 


| Eëğ BCE Administrator 
FE CGatabase besktop 


belphl 7 


4% ımGapRSZ.exe) 


(SS J TS11.hem = Microzof TT 


EE Z7 MQ Ca 


أو من خلال النقر المزدوج على الاختصار الموجود على سطح المكتب أو شريط السرعة. 


Adobe 

ابق 

AYSFTOL 

BEorlarnd Dolph 7 

CyberLink DYO Silke 
Cuplicatbe File GDetective 3 
EasyPHP 5.3.1 

Foxit Réêader 

arms 

Golden Al wafî Translakor 
InterBase 

E-Lite Codec Fack 

Lg GOGO Auto Firimmare Update 
PEcrosoFt NET Framework SOK ¥1.1 
Piierozoft GFF 

Microsoft Visual Studlo ZOOS 
Fozilla Firefox 

Naro 7 Essentials 

NITE Z.2 

GuilekTimê 

Startup 

Super Copier zZ 

Wdegk Af 

virtual Fazcal va. 1 

WISE oker 

WIR AE 

Wise Oil, Tree 

pple o bre اوخ‎ 
EBay 


Foxit Reۍdêr‎ 
= WiRRAR 
2 Adobe Photoshop CS 


O EYbaerLirk GYD Sita | | 
د5‎ | Caruana Prormipk 


Se SuparCopisr 


Eê ierosoFt OFFiee Wor 


#0008085 6 86 8866 8 6 8 6 û 8 8 6 
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ستظهر أمامك الواجهة الرئيسية لل [5۴٤‏ ماذا يعني هذا المصطلح ؟ 


tegrated development environment‏ أي بيئة التطوير المتكاملة حيث تسهل 


عملية الترجمة والربط والتحرير. 


كما تلاحظ في الصورة 


و 


a ER Sah Via Met Fin Concert. taba Toc Wein Hp Hn HA 
ERB EE û | rtd | Madina | ORawant | Wina] Sree Î Dats Acces | Data Cort | Esti | DutaSnas Î DE | A0 | liate | WeSemiees | 
BABII 4 AFAR MRE $" 


عارضة القوائم 
لوحة الكونات 
محرر الشفرة 


EH {Î Varialiea anatarte)  گ‎ 


Er Uies 


intearfane 


EFE 
Wiridowa, WHessajes, EysUrcils, TartlanTrs, Clasp 
Pinlogm? 


iraphicza, Cûnrrala, Forma, 


type 
TFormd & large [TFoET 
private 


أ - محرر الخواص: _والذي يتم بواسطته تعديل الخصائص والأحداث للعنصر. 


im" Lai i 


TranapareriCol I ciBlack 
UseDlockM ana False 
HVertSerolBs  [TContoBerc 
Visible False 
ا ا ا‎ |537 
WirdowS Late | wsNlomal 


ب - شجرة العناصر: تظهر هذه النافذة العناصر الموضوعة على النموذج على شجرة من 


العناصر. 
OTU FT ¥‏ 
I Formîl‏ 
E] Buttonî‏ 


E] ComboBox 
lm) Combofox2 
8| laroupBı 1 


ج - لوح كنت Component Palette‏ : 
ای ارات تد ری کل عد مک تات یمن ادام کے اکر رع وھ غار عن 


أدوات جاهزة تسهل عملة التصميم والبرمجة» سيشرح بعض من الأدوات المجودة خلال 


التطبيقات القادمة إن شاء الله. 
Staran f AdORHoRAN TY WRIA SMe Daa ATEzSs [ Oala ConuoE [ abE Roe | Dalana | BOF‏ 


Lh PT EF ILLA RL Sle K EL ERLE aca Û 


Ur | 


د - محرر الشيفرة : وهو المكان الذي نقوم ضمنه بتحرير الشيفرة . 
+ 
nit Unitl:‏ 


8 
interface 


UBER 


Yuindows, Messages, 5y 
Dialogs; 


| type 


TForml =" class (TForEm) 
private 


f PrarFatê decsil araiIı® 


ه - القوائم الرئيسية: 


File Edl Search Ylew Project Run Lomponent Uatabase Tools Window Help 


وهنا شرح لأهم الأوامر الموجودة داخل القوائم الرئيسية 
ه 1 القائمة :file‏ 
وتتضمن الأوامر التالية: 


N۷‏ ويحتوي على عدة أوامر بالضغط عليه تظهر 


Application‏ ل 
CLX Application‏ 21[ 
Dala Module‏ 


0n‏ icatiاppه‏ لإنشاء برنامج جديد يعمل على منصة لويندوز 
C1× application‏ إنشاء برنامج يعمل على منصة لویندوز ولینکس 
(at modu e‏ إنشاء وحدة جديدة (يتم الوصول إليها من جميع نماذج المشروع) 


۴1 إضافة نموذج جديد للمشروع 
1ا فتح وحدة جديدة للتطبيق الحالي 


٠‏ 6طا0 يؤدي إلى فتع نافذة تسمح نا باختيار احد التطبيقات التي توفرها الدالفي كما 
في الصورة 


Data Modules | Irmawisb | Coba |] wWekServicers | Webênap | Burnes 


Naty | evek | Mite | Freee | Forms | Dilalogs | Froects 
8 mm ا اڪ ا‎ 
Halth Fla ر‎ Corftial Farmall 
Le پات پا‎ ai Applicaton 
[i ا‎ 
E = 
DLL Wizard Fk Projeêt Giıoup FAetouree DLL ق‎ 
Wizard Apple akioaî 


@ 


Ws Sa 
Applicat ûn 
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- n«ع0p‏ تمكنك من فتح ملف وحدة مخزن داخل القرص 
project -‏ nع0p‏ تمكنك من فتح مشروع مخزن داخل القرص 
- nعRe0p‏ تعيد عرض المشاريع أو الملفات المفتوحة مؤخرا 
Sve -‏ تخزن التعديلات على جميع الملفات المنتمية إلى المشروع 
»ه ع۷ه؟ يؤدي إلى حفظ المشروع باسم جديد 
11 عهS‏ يؤدي إلى حفظ جميع الملفات المفتوحة حاليا 
- م10 يودي إلى إغلاق النافذة الفعالة 
- ااه عءها€ يؤدي إلى إغلاق جميع الملفات المفتوحة خلال الجلسة 
se uni -‏ لاستخدام وحدة أي وضعها بعد التعليمة میں 
- ارز لطباعة النموذج الحالي أو الوحدة الحالية 
ه 2 القائمة :Ed¡)‏ 
nee -‏ : يؤدي هذا الأمر إلى التراجع الأفعال الحديثة 
R ed0 -‏ : هذا الأمر هو عكس الأمر السابق 
- اا : يؤدي إلى قص الشيء ووضعه في الحافظة 
:دی ی ر ا ا ا ا 


- مstه۴:‏ يؤدي إلى لصق محتوى الحافظة. 

- :عtع1اع(‏ يؤدي إلى حذف المكون المختار. 

- 11ج )ءeاءS‏ : يؤدي إلى تحديد (اختيار) الكل. 

- ع 0ا nع1اA:‏ يؤدي إلى محاذاة المكونات المحددة على مصمم النموذج إلى 
فرت فل من لفك الاه رة على مص اناا 

:Bring to front -‏ يوئ ال وضع المكون المحدد أمام جمیع المكونات الموجودة. 

- )عط :Send to‏ يؤدي هذا الأمر إلى وضع المكون المحدد خلف جميع مكونات 
الفا 

- «عA11:‏ يفتح صندوق حوار المحاذاة الواضح في الشكل التالي: 


lıgqnme nt 

Horzontal Yerlical 

(& lo chang ( No change 

` Left sides (“ Tops 

` Cenlers f“ Centers 

°` Aight sides ” Bottoms 

` Space equally ` Space egualy 

(” Center in window C Center in windows 


E IC 


وله الخياراث الثالية: 


الإيقاء على الوضعية الراهنة للمكونات على مصمم النموذج دون No Change‏ 

اي تعدیل 
رصف الحواف اليسرك للمكونات الشحدحة (اثيرة أفقي فقا lefSides‏ 
ا nts‏ 
رمف الخراق الشدى اللسكونات الحسندة (تائيزه أفقي فط Rghtsides‏ 
رصف الحواف العليا للمكونات المحددة (تأثيرة شاقولي فقط). Tops‏ 
رصف الحواف السفلى للمكونات المحددة (تأثيرة شاقولي فقط). Bottoms‏ 
رصف المكونات المحددة مع المحافظة على مسافات متساوة بینها. ‏ ا۹ua 9e‏ 
رادت ب فرك ات و عم الو Centerin Window‏ 


- م51z:‏ يؤدي إلى فتح صندوق الحوار الواضح في الشكل: 


dt: Height: 

@ Ho changg ( No ghange 

(` Shrink to stnalasl f Shrink lo smallesl 
` Grow to largest (Grow to largest 


` Width: f” Height: 
[6K |__Cancd |___ Heb 


وله الخيارات التالية: 


- 018اcon :0ck‏ يؤدي هذا الأمر إلى حماية جميع مكونات النموذج في موقعها 
الحالي حتى لا يتغير موقعها عن طريق الخطأ. 
ەه 3 القائمة project:‏ 
:A dd t0 project -‏ يسمح بإضافة أي وحدة إلى لائحة وحدات المشروع. 
:Remove from project -‏ يسمح بحذف أي وحدة من المشروع الحالي. 
:V 1ew source -‏ يعرض ملف المشروع الحالي ضمن محرر الشفرة. 
project -‏ eا0mpi:‏ يترجم جميع ملفات المشروع ويربطه مع المكتبات الدينامكيةء 
وملفات مصادر المشروع. 
- 100م 0: يسمح بوضع خيارات خاصة بالمشروع. 
ہ 4 القائمة :r u‏ 
:Ru« -‏ يقوم هذا الأمر بترجمة وتنفيذ التطبيق. 
ver -‏ pعSt:‏ يسمح بتنفيذ التطبيق سطرا تلو الأخر مع القفز فوق التوابع. 
1t0 -‏ مع آ: يسمح بتنفيذ التطبيق سطرا تلو الأخر دون القفز فوق التوابع. 
:R un t0 cursor -‏ يسمح بتنفيذ البرنامج بشكل متكامل ويتوقف فور الوصول إلى 
المؤشر. 
:Pr0gram pause -‏ يسمح هذا الأمر بالإيقاف المؤقت لتنفيذ البرنامج. 
reset -‏ ramعدPr:‏ يسمح هذا الأمر بإيقاف تنفيذ البرنامج بشكل نهائي. 
ه 5 القائمة eيئوط data‏ : 
- 0reاExp:‏ يقوم بفتح مستكشف قواعد البيانات انظر إلى الصورة التالية. 


` Defrilion of cherts.dbt 
Defniicn | Dala | Ente SAL | 


a E RF a O o E O a 


1 O neteusl. db 
HM MM nima ™ 


ه 6 القائمة وا00): 
:En vironment options -‏ يعرض صندوق حوار خيارات بيئة الدالفي. 


:E dito opti 008 -‏ يعرض صندوق حوار خيارات محرر الشفرة. 


- إنشاء أول برنامج بالدالفى: 


بعدما تطرقنا إلى بعض النوافذ والقوائم في الدالفي يمكننا أن نقوم الآن بإنشاء أول برنامج 
كما قلنا سابقا الأمر سهل بالدالفي لأنه يسهل لنا العمل»ء كل ما تحتاجه لإنشاء برنامج هي 
بعض النقرات: 


- إبدأ مشروعا جدیدا عن طریق القائة File 2 New 2 App|ica101‏ 


ا×اطلے _ 


Ê‏ د فة ف a‏ ق هھ ت هه كه هه هه هف هه ف ك ك .ةة « كه 


EH KD FESR KH GEG KERGE HS BB E FTG EGE TG E E E Ka & § 
ME KE KHK KE GH KRA i OR O E a RR Gi GG KK a F&F û ê f 
km a sas a mG a a am aa a Rms SE 6 a a o * § 
RS GG KRG BG HO A GG o aE GG Rê û ê E GR RF a ‌َ‌ 
BG MR FEF EE E GE FF TD O FE TD aE TD O FF 1 E FG 2 a ١ 
MB E RSE Kim EB KDE KE ESE SRR RM FE aR FG GG Qa GG E RRM sS 8 § 
a Ga MS a mm GaGa a aR GG mM a aê û ê & aa aê a @§ 
mE GG mmm mm BI EDS WN HER MGS FH mE GS e e mime # 
E GG RM E KH GG aS E KG E Oa SD iG KG i 6 a UR ةة‎ 


mm BE BE BER E mR E RE E BE Mmm BR GOS BM BE Bm BE 


بطر آلشگل آکیر على جهار لکن بمكك تخحيمهة من خلال الضغط طلى السهم المائل ف 
السحب أو من خلال الخصاتص كما ستفعل في هذا المثال: 


أعط النموذج الخصائص التالية: 


تقوم هذه الخاصة بتحويل اتجاه النص والعناصر في النموذج 
bdRightToLeft ; BiDiMode‏ 


من اليمين إلى اليسار (لمواققة البرامج العريية) 


Width‏ 300 تحديد عرض النموذج 
Caption‏ برنامج الترحيب تحديد عنوان للنموذج يظهر في شريط العنوان 


poDesktopCenter | Position‏ تحديد مكان ظهور النموذج عند التشغيز 


سنتطرق لشرح بعض الخصائص بالتفصيل فيما بعد 


اذهب إلى القائمة ١ة‏ لمه)ء واختار العنصر 1ع طه] تابع الصور 


r ON f 
= 


انتقل إلى محرر الشيفرة وذلك عن طريق الضغط مرتين على الزر 


Unit | 


procedure TForm1i. ButtoniClick{[Sender: TObpject] z2 
begin 
أ‎ 


end; 


أكتب بين الأمرين دإععط و مء السطر التالي : 
;'udlںم Label1.Caption := 'pSıle‏ 


شغل التطبیق من خلال ^۸٦٣‏ ٣۔۸‏ أو بالضغط على الزر ۳۴9 أو مرإ 


اضغط على الزر ولاحظ النتائج. 


شيفرة التطبيق ستظهر بالشكل التالي عند الانتهاء 


UAL UNILEL; 
interface 
uses 


Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 


Diallo, SEQCEELS, 


type 


TEOEFML = GIa3S8 (TEOEM) 


Label lL: TLabel; 


BUEEORMI; TOU EOD; 


البرنامج الثاني: 


Dirocedlure BULtOnNnICLiICK (Sender: TObDJect) ? 
private 

{ Brilvate declarations |} 
NES 

CEMGIIE declare ORS | 


end; 


Var 


WOM: TECO 


implementation 


{$R *.dfm} 


procedure TEGrMI.BUEEONICIiIEkK (SENTEFE: TOBIECE) ; 
begin 
ا د و 2 و‎ 7 


end; 


end. 


- إبداً مشروعا جديدا عن طريق القائمة File 2è New ¬? Applica4101‏ 


غير خصائص النموذج إلى: 


BiDiMode 


Height 
Width 
Caption 


Position 


bdRightToLeft 


250 
360 
برنامج تغيير الالوان 


poDesktopCenter 


تقوم هذه الخاصة بتحويل اتجاه النص والعناصر في النموذج 
من اليمين إلى اليسار (لموافقة البرامج العربية) 
تحديد ارتفاع النموذج 
تحديد عرض النموذج 
تحديد عنوان للنموذج يظهر في شريط العنوان 


E‏ أربعة آزرار Button‏ من الصفحة da٣۵4‏ هSt‏ غير خصائص کل منهم ال 


Button] O 
Redbtn Name 
احمر‎ Captin 
50 Top 
50 Left 
Button2 O 
Greenbtn Name 
اخضر‎ Captin 
100 Top 
50 Left 
Button3 O 
Silverbtn / Name 
فضي‎ ٣tn 
150 Top 
50 Left 
Button4 O 
Closebtn Name 
إ|إغلاق‎ ٠ Caption 


تغيير عنوان الزر 
تحديد بعد الزر عن أعلى النافذة 


تحديد بعد الزر عن يسار النافذة 


تغيير عنوان الزر 
تحديد بعد الزر عن أعلى النافذة 


تحديد بعد الزر عن يسار النافذة 


تغيير عنوان الزر 
تحديد بعد الزر عن أعلى النافذة 


تحديد بعد الزر عن يسار النافذة 


تغيير عنوان الزر 


Top‏ 250 تحديد بعد الزر عن أعلى النافذة 
Left‏ 50 تحديد بعد الزر عن يسار النافذة 


الآن التصميم قد اكتمل ولكن البرنامج لن يعمل بالشكل الصحيح لأنه ينقصه أهم شيء وهي 


نضغط مرتين على الزر الأول فيظهر محرر الشيفرة نكتب فيه ما يلي: 
form1.Color := cired ;‏ 


تقوم هذه العملية بتغير لون النموذج إلى اللون الأحمر عن طريق إعطاء خاصة اللون 
Coo‏ القيمة لعc1r‏ وهي قيمة محجوزة فئ الدالفي وتدل عل اللون الأحمر. 


ج و 
form1.Color := clgreen;‏ 
نضغط مرتين على الزر الثالث فيظهر محرر الشيفرة نكتب فيه ما يلي: 
form1.Color := clsilver;‏ 
نضتخط مرتين على الزر اارايع فيظهر مزر الشيفرة نكت فيه ايلي 
close;‏ 
تقوم هذه التعليمة بإغلاق النافذة 


E ORM EGR DE 


اغلاق 


سنقوم الآن بشرح سورس كود البرنامج الأول: 


URLE UNIEL?; 
interface 


uses 


Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 


DialO0S, SEQCEELS, 


type 
TEOEML = ClasS (TEOEM) 


Labell1: TLabel; 


BUCE EON: TEUEEOD; 

procedure Button1lClick (Sender: TObject); 
private 

{ Brivalte declarations J} 
UGILIGS 


{1 PuBlie declaralt Ions | 


end; 


- لاحظ معي الكلمات باللون الأزرق هي عبارة عن كلمات محجوزة يمثل كل منها أمر 
معين» بداية مع رأس البرنامج نجد كلمة )من ماذا نعني بها: وهي تشمل آنواع البيانات 
(أي تتضمن الأصناف) » وإعلانات المتغيرات والثوابت » والوظائف والإجراءات ...الخ. 
- قسم الاتصال الخارجي ع عه؟إم)م1: تستعمل لتعريف الوحدات الخارجية. ويمكن أن 
نجدها بشکلین : 
ه الأول وهو في بداية البرنامج كمثالنا هذا وهنا تكون التعريفات مرئية من قبل 


الوحدات الأخرى. 


ث الثاني في داخل البرنامج هذا في البرمجة الكائنية انظر الصورة: 


mit Unitl # 
nmterface 


ses 

WIndows, Messages, SyYSVtIILs, Variants, Glasses, 
rڱaphicsz,‎ Controls, FOEME, 

Dialogs? 


YFP 
f/ An inferface definition 
TVehicle\ = Interface {IInterface 

f/f Froptgkises and a Fur rt 
FifitElioh GED ۳ 

function GetMilas Titer 

property age 3: Integer read GetAgez; 
property miles : Integer read GetMiles; 


ff Hor-property Function 
Function GeLValue ; Currencyz 
endl? 


f7 Implement this interface in a car class 

f/# Hote that TInterfaceobject defines 
ueryInterface, _AddRef 

/#_ aAddRaF Functions For us 


الق عون ين عن اس الركات الى سم انتردها أي الرطات التي تافل 
ا سوا ات تالكا اققايات اخااة الره 

- مpر:‏ تعرف صنفا جديدا مورتا من الأداة المضافة لو تلاحظ إن كل أداة أو أي 

:Var -‏ یتم فیهھ تعریف غرض ۴٥۲٣۸1‏ من النوع 1۴٥۲٣1‏ ویشیر ۴٥٣٣۸1‏ إلی 
الق ایك لهل عه ان 

- ementationاpص1:‏ يمكن أن يحتوي هذا القسم على تصريحات عن توابع 
ات و ت ا ف ا ا ی ج ا ر داعت 
المستخدمة داخل الوحدة. 

- التعليقات: انظر أين يوجد الخط المتقطع بالأحمر هذا ما يسمى بالتعليقات أو 
الملاحظات وهي لا تؤثر في البرنامج أو بمعنى أخر المترجم لا بلتفت إليهاء ويمكن كتابتها 
بعدة أشكال : 


- } ) أكتب أي نص تريده بين هذين القوسين» ويمكن أن يكون على عدة أسطر 


- (**) أكتب أي نص تريده بين إشارتي القوس والنجمة › ويمكن أن يكون على عدة 
اظ 
- // أكتب أي نص تريده بعد هذين الإشارتين» النص على سطر واحد فقط. 


أما في الأخير فقد قمنا بإضافة التعليمات التي تنفذ عند الضغط على الزر. 


إلى هنا ينتهي الجزء الأول من الكتاب أرجو من مَّن وجد خطا أو لديه ملاحظة أن يرسلها 
إلي عبر البريد الاليكتروني التالي: 


Chiaditahamohamed @ gmail.com 


